home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / workbench / libs / reqtools22c_usr.lha / ReqTools / Glue / SAS-C / LibSource.lha / src / rtGetStringA.asm < prev    next >
Assembly Source File  |  1993-08-25  |  242b  |  19 lines
  1.  
  2.     SECTION "text",CODE
  3.  
  4.     INCLUDE    "reqtools.i"
  5.  
  6.     XDEF    _rtGetStringA
  7.  
  8. _rtGetStringA:
  9.     movem.l    a2/a3/a6,-(a7)
  10.     GETRTBASE
  11.     move.l    16(a7),a1
  12.     movem.l    20(a7),d0/a2/a3
  13.     move.l    32(a7),a0
  14.     jsr        _LVOrtGetStringA(a6)
  15.     movem.l    (a7)+,a2/a3/a6
  16.     rts
  17.  
  18.    END
  19.